Top 10k strings from Four Minutes from Glory (1983)(Lambourne Games)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TZX] /
Back to the directory listing
5 F(N(L(X)),1
3 XX=N(L(X)):
3 S(L(X))<-99
2 l(x1)=l(x1-1
2 XX=N(L(Z)):
2 O(L(Z))=-1
2 J$="-:--.--":
2 ;"FOUR MINUTES FROM GLORY";
2 ;"EASES UP";:
2 ;"--------------";
2 ;"** BAULKED **";:
2 )=N(L(X)):
2 )=M(L(X),2
2 ),d(l(x),2
2 ),D(L(Z),2
2 )*LA+(X2>13
2 )*-LA+(X2>38
1 sr = (mo=1
1 sp1=-(mat-1
1 s(ru)=s(ru)-sr:
1 s(l(x))>-1
1 mp=bas+(m> r(mo*2
1 b$="51260006317"
1 a(X)=H(X,HEA):
1 ZZ=ZZ*(ZZ1=0
1 ZZ=O(L(L)):
1 ZZ1=((S(L(L))<0
1 Z$="136:?EJNQST"
1 XX=H(Y,X):
1 X$=A$(L(Z)):
1 W(X1,Z)=W(X1-1
1 V(Y)=V(Y)+XX:
1 U$="RESTRICTEDNORMAL "(1
1 U$="RESTRICTED"
1 T2=M(L(X),3
1 T1=M(L(X),2
1 T(M(L(X),2
1 STM=(STM=0
1 SR1=X(D,SR):
1 SPT=M(L(X),2
1 SPT=G(X,Y):
1 SPT=B(X,MIL+1
1 SPT=B(H(Y,X),MIL+1
1 SPT < B(N(L(X)),MIL+1
1 SL=S(L(X)):
1 S(X)=S(X)-4
1 S(RU)=S(RU)-D
1 S(RU)=S(RU)-1
1 S(RU)=-100
1 S(L(Z))>-100
1 S(L(Z))=-100
1 S(L(Z))<-99
1 S(L(X))=S(L(X))-D:
1 S$=" "
1 RESTRICTED
1 R=R-(CHA=0
1 R2=N(X)-R1*10
1 R$(N(X),11
1 R$(N(RU),Y+11
1 R$(N(L(Z)),23
1 R$(N(L(X)),22
1 PAC=PAC+MAO-3
1 PAC=PAC+MAO-2
1 PAC=(MAO=3
1 P(RU)=P(RU)+1
1 NSP=(NSP=0
1 N(D)=A(X):
1 MIL=(MIL=0
1 MAO=O(L(Z))
1 MAO < O(L(Z))
1 M$(O(L(Z)));
1 LMS=M(RU,1
1 LINCOLN (AUS)Z
1 K$=G$(X1,1
1 K$="DISPLAYED RESTRICTED"(1
1 K$="DISPLAYED ":
1 K$= R$(XX,1
1 K$;" ";A$(L(X));S$(1
1 IK=IK-(IK=6
1 IK;K$;" ";
1 I$(PAT)=J$:
1 HOLDING NORMAL INTENSIVE
1 HO=((HEA/2
1 H(Z,Q(X1))=X1
1 H(X,HEA)=0
1 H(X+(HEA>2
1 H(X+(HEA=5
1 H(Q,Q(X1))=H(Q-1
1 H(Q,Q(X1))=0
1 G(X,Y)=500
1 FMFG
1 FM=Y(D,F(X1,2
1 EASE UPNORMAL PICK UPFORCINGSPRINT RETIRESTIED UP
1 E$="SEMI-FINAL "+
1 E$="HEAT 1":
1 E$="HEAT "+
1 E$="FINAL"
1 DM1=TGT-(14
1 D=W(X1,Z):
1 Created with Ramsoft MakeTZX
1 CHA=(MEN=2
1 B(X,Y)=500
1 B(N(L(X)),MIL+1
1 B(H(Y,X),MIL+1
1 ABASCAL V69586969@122SPAANDERSSON V6947696:@136SWEAOUITA Y69473648?124MORBANNISTER W58474758@227GBRBAUMANN V69697:69?211FRGBAYI Y6969476:>024TANBILE Y47364837?204SOMBOIT V7:585848>114KENBUSSE R587:6947?131GDRCACHO U47585858@222SPACHERUIYOT T58587:58@224KENCOE W4758586:@137GBRCOGHLAN U7:476948?134IRLCRAM Y8:474749@127GBRDELANEY U36697:49@304IRLDELEZE T8;585869?021SWZDI NAPOLI U58587:47?211ITAH.ELLIOT [7:47475:?116AUSP.ELLIOT V58587:48?117GBRGONZALES W7:695837>222SPAHAAG X5847366:>026SWEHEROLD W8:365838?111GDRHILLARDT U697:586:@116AUSJAZY W8;69476:?141FRAJIPCHO T47695837>034KENKEINO Z7:47586:>024KENKEMEI V58475859?104KENKHALIFA T7:58486:@134SUDKIBET U7:374769>024KENKIROCHI T58375848?114KENLANDY X6958475:?036AUSLINCOLN V58476947?116AUSMAREE U6969476:?022USAMOORCROFT T5847695:?117GBRMORCELI Z47373659@014ALGNURMI Y9:37365:?001FINO'MARA W698;6949@234IRLOVETT X7:365849@147GBRRONO U7:584769?014KENRYUN
1 A$(X)+Y,V(Y+1
1 ;X;". ";K$;" ";J$
1 ;N$(F(X1,2
1 ;M$(O(L(Z)));
1 ;"UNFIT TO RACE"
1 ;"TRAINING";
1 ;"TIEING UP";:
1 ;"THE COMPUTER VERSION OF -";
1 ;"STAMINA REDUCTION=";sr;
1 ;"STAMINA -";D:
1 ;"STAMINA ";-D:
1 ;"ST=";S(L(Z));
1 ;"RUNNERS BEING SELECTED":
1 ;"RUNNER TO CHANGE (0 FOR NONE)";:
1 ;"RUNNER SELECTION SCREEN";
1 ;"RUNNER NAT NO FL";
1 ;"RACE ORDER AFTER TURN ";T-1
1 ;"RACE DRAW":
1 ;"RACE DRAW BEING MADE":
1 ;"POS. RUNNER NAT TIME ";
1 ;"PACE ";
1 ;"OPTIONS MENU";:
1 ;"OAD RUNNER DATA";
1 ;"NO. RUNNER NAT PB ";
1 ;"NO. RUNNER NAT PB ";
1 ;"NO. RUNNER NAT FL PB ";
1 ;"NO EFFECT":
1 ;"NAME OF FILE TO LOAD (MAX 10)":
1 ;"NAME (MAX 18) OF ";:
1 ;"MOVEMENT REDUCTION ";
1 ;"MOVEMENT -1";:
1 ;"MODE = ";M$(O(RU));
1 ;"MAIN MENU";:
1 ;"LOSES ";D;" STAMINA PTS FOR LEADING";:
1 ;"LOSES CONTACT":
1 ;"LEADING ";:
1 ;"LAST LAP";:
1 ;"IS BOXED IN";
1 ;"ILLEGAL ENTRY - TRY AGAIN";:
1 ;"GENERATING DATA FOR NEW SEASON"
1 ;"FORCED WIDE":
1 ;"FINAL CHAMPIONSHIP TRAINING":
1 ;"FASTEST LOSERS":
1 ;"EW SEASON ";
1 ;"ENTER RUNNER ";
1 ;"CLIPS HEELS OF RUNNER IN FRONT";:
1 ;"CHAMPIONSHIP DRAW BEING MADE":
1 ;"CHAMPIONSHIP -"
1 ;"CHAMPIONSHIP MENU";
1 ;"AT THE START";
1 ;"ALL TIME LISTS";:
1 ;"<SPACE>";
1 ;".NORMAL ";
1 ;".INTENSIVE";
1 ;".HOLDING ";
1 ;".";M$(A);:
1 ;". STAMINA";
1 ;". SINGLE RACE"
1 ;". SAVE GAME";
1 ;". SAVE GAME"
1 ;". S RUNNERS"
1 ;". RUNNERS";
1 ;". RUNNER INFORMATION"
1 ;". NEXT HEAT";
1 ;". NEW SEASON";
1 ;". MOVEMENT";
1 ;". FASTEST LOSERS";
1 ;". DISTANCE";:
1 ;". CONTINUE"
1 ;". CHAMPIONSHIP";
1 ;". ALL TIME LISTS";
1 ;". ALL TIME LISTS"
1 ;"------------------";
1 ;"------------";:
1 ;"---------";
1 ;"+++ SPLIT TIMES +++"
1 ;"***** RETIRES *****";:
1 ;"***** END OF RACE *****";:
1 ;"*** SPIKED ***";:
1 ;"*** RETIRES THIS TURN ***";:
1 ;"*** OFFICIAL RESULT ***"
1 ;"** PLEASE WAIT **";:
1 ;"** FALLS **";:
1 ;"** BADLY BAULKED **";:
1 ;"'THE METRIC MILE'";
1 ;"## SPLIT TIME ##";
1 ;" RUNNER NAT FL TRAINING ";
1 ;" ";
1 51260006317
1 400M 800M 1200M 1 LAP 2 LAPS3 LAPS
1 1500 M1 MILE
1 .333+(MIL=0
1 -X2)+(X2>16
1 -X2)+(X2=37
1 -(lm-m(ru,1
1 -(MP-MA)):
1 ,Q(X1))=H(Q,Q(X1)):
1 +mil)=m(l(x),2
1 +X2)=W(X,1
1 +PAT);" : ";j$:
1 +MIL)=G(X1-1
1 +MIL)=G$(X1-1
1 +MIL) < G(X1-1
1 +A1)+(N4-N3)*(12
1 +((F(N(X),1
1 )=F(N(L(X)),1
1 );Y;". ";:
1 );X;". ";G$(X,Y);
1 );X;". ";:
1 );R$(N(L(Z)),1
1 );N$(F(X1,2
1 ),PAC+(PAC=0
1 )+gd*(mo=3
1 )+d2*(mo=4
1 )+d1*(mo=2
1 )+" ("+R$(XX,24
1 )*X2+(X2>9
1 )*X2+(X2=12
1 )*LA+(X2>33
1 )*-LA+(X2>16
1 ));F(N(X),1
1 ))+(m> r(mo*2
1 ) > m(l(x1-1
1 ) > W(QT,2
1 ) < m(l(x1-1
1 ) < W(X1-1
1 (S2))*10000
1 (R$(XX)(13
1 (R$(XX)(12
1 (J$="WR");J$;
1 ((SPT- S1*60
1 (((SPT-S1*60
1 ("B[BR1BN[5B"(T
1 ("0122233344455667"(F(N(X),1
1 "ST=";S(L(Z));
1 "METRICMILE"
1 "BAULKED";:
1 1993 LAMBOURNE GAMES & R.HANNA";
1 B
1
1